package com.doordu.soa.service.comm.utils;

import java.beans.BeanInfo;
import java.beans.Introspector;
import java.beans.PropertyDescriptor;
import java.lang.reflect.Method;
import java.security.Key;
import java.security.Security;
import java.util.ArrayList;
import java.util.HashSet;
import java.util.List;
import java.util.Set;

import javax.crypto.Cipher;

import org.apache.commons.lang3.StringUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

/**
 * DES对称加密工具类
 * 
 * @ClassName: DesSecurityUtil
 * @Description:
 * @author xiaoqun.yi yixq@doordu.com
 * @date 2017年4月6日 下午1:49:50
 * @version V1.0
 */
public class DesSecurityUtil {
	protected static final Logger logger = LoggerFactory.getLogger( DesSecurityUtil.class);
	private static String strDefaultKey = "doordu-admin";

	private Cipher encryptCipher = null;

	private Cipher decryptCipher = null;

	private static DesSecurityUtil desSecurityUtil = null;

	static {
		try {
			desSecurityUtil = new DesSecurityUtil(strDefaultKey);
		} catch (Exception e) {
			e.printStackTrace();
		}
	}

	/**
	 * 将byte数组转换为表示16进制值的字符串 hexStr2ByteArr(String strIn) 互为可逆的转换过程 需要转换的byte数组
	 * 28. *
	 * 
	 * @return 转换后的字符串 29. *
	 * @throws Exception
	 */
	public static String byteArr2HexStr(byte[] arrB) {
		int iLen = arrB.length;
		// 每个byte用两个字符才能表示，所以字符串的长度是数组长度的两倍
		StringBuffer sb = new StringBuffer(iLen * 2);
		for (int i = 0; i < iLen; i++) {
			int intTmp = arrB[i];
			// 把负数转换为正数
			while (intTmp < 0) {
				intTmp = intTmp + 256;
			}
			// 小于0F的数需要在前面补0
			if (intTmp < 16) {
				sb.append("0");
			}
			sb.append(Integer.toString(intTmp, 16));
		}
		return sb.toString();
	}

	/**
	 * 将表示16进制值的字符串转换为byte数组， 和public static String byteArr2HexStr(byte[] arrB)
	 * 互为可逆的转换过程
	 * 
	 * @param strIn
	 *            需要转换的字符串
	 * @return 转换后的byte数组
	 * @throws Exception
	 */
	public static byte[] hexStr2ByteArr(String strIn) {
		byte[] arrB = strIn.getBytes();
		int iLen = arrB.length;

		// 两个字符表示一个字节，所以字节数组长度是字符串长度除以2
		byte[] arrOut = new byte[iLen / 2];
		for (int i = 0; i < iLen; i = i + 2) {
			String strTmp = new String(arrB, i, 2);
			arrOut[i / 2] = (byte) Integer.parseInt(strTmp, 16);
		}
		return arrOut;
	}

	/**
	 * 默认构造方法，使用默认密钥
	 * 
	 * @throws Exception
	 */
	public DesSecurityUtil() throws Exception {
		this(strDefaultKey);
	}

	/**
	 * 指定密钥构造方法 86. * 87. *
	 * 
	 * @param strKey
	 *            指定的密钥
	 * @throws Exception
	 */
	public DesSecurityUtil(String strKey) throws Exception {
		Security.addProvider(new com.sun.crypto.provider.SunJCE());
		Key key = getKey(strKey.getBytes());

		encryptCipher = Cipher.getInstance("DES");
		encryptCipher.init(Cipher.ENCRYPT_MODE, key);

		decryptCipher = Cipher.getInstance("DES");
		decryptCipher.init(Cipher.DECRYPT_MODE, key);
	}

	/**
	 * 加密字节数组
	 * 
	 * @param arrB
	 *            需加密的字节数组
	 * @return 加密后的字节数组
	 * @throws Exception
	 */
	public byte[] encrypt(byte[] arrB) throws Exception {
		return encryptCipher.doFinal(arrB);
	}

	/**
	 * 加密字符串
	 * 
	 * @param strIn
	 *            需加密的字符串 119. *
	 * @return 加密后的字符串
	 * @throws Exception
	 */
	public String encrypt(String strIn) throws Exception {
		return byteArr2HexStr(encrypt(strIn.getBytes()));
	}

	/**
	 * 解密字节数组
	 * 
	 * @param arrB
	 *            需解密的字节数组
	 * @return 解密后的字节数组
	 * @throws Exception
	 */
	public byte[] decrypt(byte[] arrB) throws Exception {
		return decryptCipher.doFinal(arrB);
	}

	/**
	 * 解密字符串
	 * 
	 * @param strIn
	 *            需解密的字符串
	 * @return 解密后的字符串
	 * @throws Exception
	 */
	public String decrypt(String strIn) throws Exception {
		return new String(decrypt(hexStr2ByteArr(strIn)));
	}

	/**
	 * 从指定字符串生成密钥，密钥所需的字节数组长度为8位 不足8位时后面补0，超出8位只取前8位
	 * 
	 * @param arrBTmp
	 *            构成该字符串的字节数组
	 * @return 生成的密钥
	 * @throws java.lang.Exception
	 */
	private Key getKey(byte[] arrBTmp) throws Exception {
		// 创建一个空的8位字节数组（默认值为0）
		byte[] arrB = new byte[8];

		// 将原始字节数组转换为8位
		for (int i = 0; i < arrBTmp.length && i < arrB.length; i++) {
			arrB[i] = arrBTmp[i];
		}

		// 生成密钥
		Key key = new javax.crypto.spec.SecretKeySpec(arrB, "DES");

		return key;
	}

	/**
	 * 加密明文字符串
	 * 
	 * @author Hailong Wu
	 * @date 2016-3-8 上午10:30:16
	 * @param plainText
	 * @return
	 */
	public static String encrypt2(String plainText) {
		try {
			return new DesSecurityUtil().encrypt(plainText);
		} catch (Exception e) {
			throw new RuntimeException("加密失败", e);
		}
	}

	/**
	 * 解密密文字符串
	 * 
	 * @author Hailong Wu
	 * @date 2016-3-8 上午10:30:34
	 * @param cipherText
	 * @return
	 */
	public static String decrypt2(String cipherText) {
		try {
			return new DesSecurityUtil().decrypt(cipherText);
		} catch (Exception e) {
			throw new RuntimeException("解密失败", e);
		}
	}

	/**
	 * 批量解密实体对象的指定属性
	 * 
	 * @version 2016-7-1 下午12:50:51 by Hailong Wu
	 * @param <E>
	 *            实体类型
	 * @param entities
	 *            实体集合
	 * @param entityType
	 *            实体class
	 * @param propNames
	 *            属性名称
	 */
	public static <E> void batchDecrypt(List<E> entities, Class<E> entityType,
			String... propNames) {
		if (entities == null || entities.isEmpty() || entityType == null
				|| propNames == null) {
			return;
		}

		Set<String> propSet = new HashSet<String>();
		for (String pn : propNames) {
			propSet.add(pn);
		}

		try {
			DesSecurityUtil des = new DesSecurityUtil();
			PropertyDescriptor[] props = getProperties(entityType, propSet);
			for (PropertyDescriptor pd : props) {
				Method getter = pd.getReadMethod();
				Method setter = pd.getWriteMethod();
				for (E e : entities) {
					String value = (String) getter.invoke(e);
					if (value != null) {
						value = des.decrypt(value);
						setter.invoke(e, value);
					}
				}
			}
		} catch (Exception e) {
			throw new RuntimeException("批量解密失败", e);
		}
	}

	/**
	 * 批量加密实体对象的指定属性
	 * 
	 * @version 2016-7-1 下午12:50:51 by Hailong Wu
	 * @param <E>
	 *            实体类型
	 * @param entities
	 *            实体集合
	 * @param entityType
	 *            实体class
	 * @param propNames
	 *            属性名称
	 */
	public static <E> void batchEncrypt(List<E> entities, Class<E> entityType,
			String... propNames) {
		if (entities == null || entities.isEmpty() || entityType == null
				|| propNames == null) {
			return;
		}

		Set<String> propSet = new HashSet<String>();
		for (String pn : propNames) {
			propSet.add(pn);
		}

		try {
			DesSecurityUtil des = new DesSecurityUtil();
			PropertyDescriptor[] props = getProperties(entityType, propSet);
			for (PropertyDescriptor pd : props) {
				Method getter = pd.getReadMethod();
				Method setter = pd.getWriteMethod();
				for (E e : entities) {
					String value = (String) getter.invoke(e);
					if (value != null) {
						value = des.encrypt(value);
						setter.invoke(e, value);
					}
				}
			}
		} catch (Exception e) {
			throw new RuntimeException("批量加密失败", e);
		}
	}

	private static PropertyDescriptor[] getProperties(Class<?> clazz,
			Set<String> propNames) throws Exception {
		BeanInfo beanInfo = Introspector.getBeanInfo(clazz);
		PropertyDescriptor[] descriptors = beanInfo.getPropertyDescriptors();
		List<PropertyDescriptor> props = new ArrayList<PropertyDescriptor>(
				propNames.size());
		for (PropertyDescriptor pd : descriptors) {
			if (propNames.contains(pd.getName()) && pd.getReadMethod() != null
					&& pd.getWriteMethod() != null) {
				props.add(pd);
			}
		}
		return props.toArray(new PropertyDescriptor[props.size()]);
	}

	/** 解密静态方法 */
	public static String decryptString(String email) {
		if (StringUtils.isNotEmpty(email)) {
			try {
				return desSecurityUtil.decrypt(email);
			} catch (Exception e) {
				e.printStackTrace();
			}
		}
		return email;
	}

	/**
	 * 加密静态方法
	 * 
	 * @Title: encryptString
	 * @Description:
	 * @author li.quan
	 * @date 2016-7-6 下午03:46:52
	 * @param source
	 * @return
	 * @return String
	 */
	public static String encryptString(String source) {
		if (StringUtils.isNotEmpty(source)) {
			try {
				return desSecurityUtil.encrypt(source);
			} catch (Exception e) {
				e.printStackTrace();
			}
		}
		return source;
	}

	public static void main(String[] args) throws Exception {
		// DesSecurityUtil d = new DesSecurityUtil("aa");
		DesSecurityUtil d = new DesSecurityUtil();
		String ciphertext = d.encrypt("yixiaoqun");
		logger.warn(ciphertext);
		String originaltext = d.decrypt(ciphertext);
		logger.warn(originaltext);

	}
}
